Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Buona sera a tutti, mi trovo in difficoltà con questi due codici, praticamente il primo non svolge alcuna funzione quando sono verificate le due condizioni e il secondo pure! potete aiutarmi???
Codice sorgente - presumibilmente Delphi
If ultimoaccesso = Dataeora And My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\121212121212", "1areo12306a34", Nothing)= "0" Then
SendMessage(h, WM_SYSCOMMAND, SC_CLOSE, 0)
Password.Show()
EndIf
Codice sorgente - presumibilmente Delphi
If ultimoaccesso = Dataeora then
If My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\121212121212", "1areo12306a34", Nothing)= "0" Then
SendMessage(h, WM_SYSCOMMAND, SC_CLOSE, 0)
Password.Show()
EndIf
Endif
le condizioni praticamente sono verificate ma il codice non lo rileva!
il tutto è inserito in un timer con intervallo = 600 ms
ciao anche io credevo questo! il codice senza chiave di registro funziona, aggiungo la verifica della chiave e non funziona più! Il problema è che la chiave esiste e il valore pure! L' ho controllato con il regedit di windows! non me lo spiego!
ciao anche io credevo questo! il codice senza chiave di registro funziona, aggiungo la verifica della chiave e non funziona più! Il problema è che la chiave esiste e il valore pure! L' ho controllato con il regedit di windows! non me lo spiego!
E se provi a verificare con l'if solo la condizione della chiave di registro? Se anche così non ci funziona dovrà esserci qualche errore o di battitura nella chiave, oppure il percorso è leggermente diverso..non saprei
Il problema era proprio quello, avevo impostato tutto il programma per cercare la chiave in HKLM\software ma poi la cercavo in HKLM. chiudete pure e grazie a tutti per la disponibilità